5 IFA=0THENA=1:LOAD"DEMO-SPRITES",8,1
10 REM ALLE ACHT SPRITES AUF DEN SCREEN
20 V=53248:REM BASISADRESSE VIC
30 X=30:Y=100:Z=0:PRINT"[147]"
40 FOR I=0 TO 7
50 :  POKEV+Z,X:REM SPRITEPOSITIONEN
60 :  POKEV+Z+1,Y:REM SETZEN
70 :  X=X+30:Z=Z+2
80 :  POKEV+39+I,I:REM FARBEN ZUWEISEN
90 :  POKE2040+I,255:REM BLOCK 255
100 NEXT
110 POKEV+21,255:REM ALLE SPRITES AN
120 FORI=0TO10:PRINT:NEXT:LIST